<?php
/**
 * CVarDumper class file.
 *
 * @author Qiang Xue <qiang.xue@gmail.com>
 * @link http://www.yiiframework.com/
 * @copyright Copyright &copy; 2008-2011 Yii Software LLC
 * @license http://www.yiiframework.com/license/
 */

/**
 * ZASTEPUJE var_dump and print_r.
 * It can correctly identify the recursively referenced objects in a complex
 * object structure. It also has a recursive depth control to avoid indefinite
 * recursive display of some peculiar variables.
 *
 * CVarDumper can be used as follows,
 * <pre>
 * CVarDumper::dump($var);
 * </pre>
 *
 * @author Qiang Xue <qiang.xue@gmail.com>
 * @version $Id: CVarDumper.php 2799 2011-01-01 19:31:13Z qiang.xue $
 * @package system.utils
 * @since 1.0
 */
class Application_Model_Narzedziowe_CVarDumper
{
	private static $_objects;
	private static $_output;
	private static $_depth;
        
   	public static $stos_wynikow;
   	public static $stos_zapytan;

	/**
	 * Dodanie do deva i WY�WIETLENIE W APLIKACJI
	 * This method achieves the similar functionality as var_dump and print_r
	 * but is more robust(solidny korrzeplki) when handling complex objects such as Yii controllers.
	 * @param mixed $var variable to be dumped
	 * @param integer $depth maximum depth that the dumper should go into the variable. Defaults to 10.
	 * @param boolean $highlight whether the result should be syntax-highlighted
	 */
	public static function dump($var,$depth=10,$highlight=false)
	{
            $wyn=self::dumpAsString($var,$depth,$highlight);
            self::$stos_wynikow[]=$wyn;
            echo $wyn;
	}
	
	/**
	 * return 'Testowe wywolanie kalsy CVARDUMP'
	 */
	public static function testecho()
	{
      return 'Testowe wywolanie kalsy CVARDUMP';
	}

        /**
         * print_r dodanie do deva
         * odpowiednik CHW DEV::Dodaj
         * @param mixed $var zmienna do wyprintowania
         * @param string $opis 
         * @author PD 2011-11-07
         */
	public static function dodaj($var,$opis=null)
	{
            $wyn=self::dumpAsString($var,10,true);
            if($opis)
            {
                $opis="<strong>{$opis}</strong>"; 
                self::$stos_wynikow[$opis]=$wyn;
            }    
            else
            {
            	    self::$stos_wynikow[]=$wyn;
            } 
           
            //echo $wyn;
	}
	
      /**
         * dodanie do deva zapytan
         * odpowiednik CHW DEV::Dodaj
         * @param mixed $var zmienna do wyprintowania
         * @param string $opis 
         * @author PD 2012-07-04
         */
	public static function dodajZapytanie($var,$opis=null)
	{
            $wyn=self::dumpAsString($var,10,true);
            if($opis)
            {
                $opis="<strong>{$opis}</strong>"; 
                self::$stos_zapytan[]=$wyn; 
            }    
            else
            {
            	    self::$stos_zapytan[]=$wyn;
            } 
           
            //echo $wyn;
	}
	/**
	 * Dumps a variable in terms of a string.
	 * This method achieves the similar functionality as var_dump and print_r
	 * but is more robust when handling complex objects such as Yii controllers.
	 * @param mixed $var variable to be dumped
	 * @param integer $depth maximum depth that the dumper should go into the variable. Defaults to 10.
	 * @param boolean $highlight whether the result should be syntax-highlighted
	 * @return string the string representation of the variable
	 */
	public static function dumpAsString($var,$depth=10,$highlight=false)
	{
		self::$_output='';
		self::$_objects=array();
		self::$_depth=$depth;
		self::dumpInternal($var,0);
		if($highlight)
		{
			$result=highlight_string("<?php\n".self::$_output,true);
			self::$_output=preg_replace('/&lt;\\?php<br \\/>/','',$result,1);
		}
		return self::$_output;
	}

	/*
	 * Prywatna metoda robi�ca w zasadzie ca�� robot�.
	 * Sprawdza jaki jest typ zmiennej dumpowanej i w zale�no�ci ot tego w casie wykonuje odowiednie wy�wietlenie
	 * @param mixed $var variable to be dumped
	 * @param integer $level depth level
	 */
	private static function dumpInternal($var,$level)
	{
		switch(gettype($var))
		{
			case 'boolean':
				self::$_output.=$var?'true':'false';
				break;
			case 'integer':
				self::$_output.="$var";
				break;
			case 'double':
				self::$_output.="$var";
				break;
			case 'string':
				self::$_output.="'".addslashes($var)."'";
				break;
			case 'resource':
				self::$_output.='{resource}';
				break;
			case 'NULL':
				self::$_output.="null";
				break;
			case 'unknown type':
				self::$_output.='{unknown}';
				break;
			case 'array':
				if(self::$_depth<=$level)
					self::$_output.='array(...)';
				else if(empty($var))
					self::$_output.='array()';
				else
				{
					$keys=array_keys($var);
					$spaces=str_repeat(' ',$level*4);
					self::$_output.="array\n".$spaces.'(';
					foreach($keys as $key)
					{
						$key2=str_replace("'","\\'",$key);
						self::$_output.="\n".$spaces."    '$key2' => ";
						self::$_output.=self::dumpInternal($var[$key],$level+1);
					}
					self::$_output.="\n".$spaces.')';
				}
				break;
			case 'object':
				if(($id=array_search($var,self::$_objects,true))!==false)
					self::$_output.=get_class($var).'#'.($id+1).'(...)';
				else if(self::$_depth<=$level)
					self::$_output.=get_class($var).'(...)';
				else
				{
					$id=array_push(self::$_objects,$var);
					$className=get_class($var);
					$members=(array)$var;
					$spaces=str_repeat(' ',$level*4);
					self::$_output.="$className#$id\n".$spaces.'(';
					foreach($members as $key=>$value)
					{
						$keyDisplay=strtr(trim($key),array("\0"=>':'));
						self::$_output.="\n".$spaces."    [$keyDisplay] => ";
						self::$_output.=self::dumpInternal($value,$level+1);
					}
					self::$_output.="\n".$spaces.')';
				}
				break;
		}
	}
}